#include "usart.h"
#include "magnetic.h"

#include "stm8l15x_usart.h"

#include <string.h>

char write_buffer[10] = "";
int write_index = 0;
int write_length = 0;

char read_buffer[10] = "";
int read_index = 0;
int read_length = 0;

void Usart1_Initialize(void)
{
    CLK_PeripheralClockConfig(CLK_Peripheral_USART1, ENABLE);
    // 初始化串口1
    USART_DeInit(USART1);
    // PC5-TX PC6-RX 端口上拉
    GPIO_ExternalPullUpConfig(GPIOC, GPIO_Pin_5 | GPIO_Pin_6, ENABLE);
    // 初始化参数
    USART_Init(USART1,
               (uint32_t)9600,
               USART_WordLength_8b,
               USART_StopBits_1,
               USART_Parity_No,
               USART_Mode_Rx | USART_Mode_Tx);//允许读和写
    // 开中断
    // 一般需要写时再开写中断，否则写中断会非常频繁以至于始终在执行中断
    // 读中断看具体业务
    USART_ITConfig(USART1, USART_IT_RXNE, ENABLE);
    // USART_ITConfig(USART1, USART_IT_TC, ENABLE);

    // 使能USART
    USART_Cmd(USART1, ENABLE);
}

void Uart1_Stop(void)
{
    // PC5-TX PC6-RX 端口上拉
    GPIO_ExternalPullUpConfig(GPIOC, GPIO_Pin_5 | GPIO_Pin_6, DISABLE);
    USART_Cmd(USART1, DISABLE);
    USART_ITConfig(USART1, USART_IT_RXNE, DISABLE);
    USART_ITConfig(USART1, USART_IT_TC, DISABLE);
}

void Usart1_WriteData(char *data, int len)
{
    USART_ITConfig(USART1, USART_IT_TC, DISABLE);
    memcpy(write_buffer, data, len);
    write_length = len;
    write_index = 0;
    USART_ITConfig(USART1, USART_IT_TC, ENABLE);
}

/**
  * @brief USART1 TX Interrupt routine.
  * @par Parameters:
  * None
  * @retval
  * None
  */
INTERRUPT_HANDLER(USART1_TX_IRQHandler, 27)
{
    USART_SendData8(USART1, write_buffer[write_index++]);

    if (write_index == write_length) {
        USART_ITConfig(USART1, USART_IT_TC, DISABLE);
    }

    USART_ClearITPendingBit(USART1, USART_IT_TC);
}

char* itoa(int num,char* str,int radix)
{
    char index[]="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";//索引表
    unsigned unum;//存放要转换的整数的绝对值,转换的整数可能是负数
    int i=0,j,k;//i用来指示设置字符串相应位，转换之后i其实就是字符串的长度；转换后顺序是逆序的，有正负的情况，k用来指示调整顺序的开始位置;j用来指示调整顺序时的交换。
 
    //获取要转换的整数的绝对值
    if(radix==10&&num<0) { //要转换成十进制数并且是负数
        unum=(unsigned)-num;//将num的绝对值赋给unum
        str[i++]='-';//在字符串最前面设置为'-'号，并且索引加1
    } else {
        unum=(unsigned)num;//若是num为正，直接赋值给unum
    }

    //转换部分，注意转换后是逆序的
    do {
        str[i++]=index[unum%(unsigned)radix];//取unum的最后一位，并设置为str对应位，指示索引加1
        unum/=radix;//unum去掉最后一位
    }while(unum);//直至unum为0退出循环

    str[i]='\0';//在字符串最后添加'\0'字符，c语言字符串以'\0'结束。

    //将顺序调整过来
    if(str[0]=='-') k=1;//如果是负数，符号不用调整，从符号后面开始调整
    else k=0;//不是负数，全部都要调整

    char temp;//临时变量，交换两个值时用到
    for(j=k;j<=(i-1)/2;j++)//头尾一一对称交换，i其实就是字符串的长度，索引最大值比长度少1
    {
        temp=str[j];//头部赋值给临时变量
        str[j]=str[i-1+k-j];//尾部赋值给头部
        str[i-1+k-j]=temp;//将临时变量的值(其实就是之前的头部值)赋给尾部
    }

    return str;//返回转换后的字符串
}

/**
  * @brief USART1 RX Interrupt routine.
  * @par Parameters:
  * None
  * @retval
  * None
  */
INTERRUPT_HANDLER(USART1_RX_IRQHandler, 28)
{
    read_buffer[read_index] = USART_ReceiveData8(USART1);
    if (read_buffer[read_index] == '0') {
        Magnetic_SetEnable(FALSE);
    } else if (read_buffer[read_index] == '1') {
        Magnetic_SetEnable(TRUE);
    }
    read_index++;
    read_index = read_index == 10 ? 0 : read_index;
    USART_ClearITPendingBit(USART1, USART_IT_RXNE);
}